ch 5)... 
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UN INSTRUMENT DE MUSIQUE ET/QU UNE COMP の STTTON ? 


INTELLEC 8008 


DAC 


VCS3 


INTELGREU 


FRAG の LA 08.2 
FRAGOLA 


MSB 
LSB 


(A) 
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GIUSEPPE G. ENGLERT 


Glossaire 


Miniprocesseur qui a servi a l'auteur dans 
cette recherche. 


Convertisseur Digita1/ Analogique qui trans- 
forme les valeurs numériques fournies par 
L'INTELLEC8 en voltages de contrôle pour 

les synthétiseurs. Aux deux sorties dispo- 
nibles de 1'INTELLEC8 correspondent deux 
DACs : DAC1 et DAC2, construits par D.Roncin. 


Modéle de synthétiseur analogique, construit 
par EMS-London. 


Langage conversationnel @laboré par Patrick 
Greussay a l'attention spéciale des musiciens. 
Sa deuxiéme version (V2 06/76) a servi pour la 
formulation de FRAG の LA 08.2 


Programme rédigé en INTELGREU V2 06/76 par 
l'auteur. f 


៦16០8 de musique, objet de cette 
sur le programme FRAGÓLA 08.2 


(most significant bit) le bit le 


étude, basée 
plus à gauche 
(liest significant bit) celui le plus à droite 


Les majuscules de AA E, H et L, désignent les 
registres de l'INTELLEC8; A étant le seul 
accumulateur ο 


Contenu du registre A 


Artinfe/Musinfesd 22 


PERIGDICITE Qualité (musicale) obtenue par la repetition 
sans variation d'un élément musical ou d'une 
suite d'éléments. La longueur de l'élément 
ou de la suite correspond a une période de la 
sequence. La periodicité peut n'affecter qu'un 
seul paramètre d'une séquence ou d'une piece. 
Des organisations périodiques a périodes 
différentes régissant des paramètres différents 
peuvent être superposés, ce qui peut donner 
en résultat une suite (faussement) apériodique. 


APERI@DICITE a) la vraie : 
elle correspond à une option visant à libérer 
le discours musical des contraintes métriques 
- de la prose plutét que de la poésie. Les 
exemples dans la musique de notre siecle sont 
nombreux. Elle est dure à manier. 
b) la fausse : 
elle est propre aux cycles de valeurs, assez 
longs pour que l'on ne puisse pas les 
reconnaître comme étant des cycles. C'est 
à l'ordinaire l'apériodicité obtenue à l'aide 
de machines. 


G, P. A. | Générateur Pseudo Aléatoire (appelé aussi 
P.R.G., pseudo random generator) : 
ー soit un dispositif analogique cablé pour 
produire des suites apériodiques (fausses), 
ー soit un sousprogramme avec la même fonction. 
Le G.P.A. utilisé dans la présente recherche 
est beaucoup plus pseudo qu'aléatoire: les 
suites générées sont très caractérisées, ce qui 
fait la joie de l'auteur. 


2» Propos musical 


CExNUP Garë :68፡5) Er ლ” იიი Gt Ge Gap gin GL VER, e Ge ა. 


Déclencher une musique ፦ utilisant la synthèse hybride 
(deux synthétiseurs analogiques contrôlés par l'INTELLECB via 
deux DACs) — motivée par le jeu possible entre les principes de 
périodicité et d'apériodicité. Pour cette exploration ces deux 
principes ont ótó élevés au niveau de catégories compositionnelles 
premières, en rapport dialectique entr'elles. L'auteur a dslibs- 
rément rang& toutes les autres catögories présentes au deuxieme rang, 
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ceci pour que l'actiondu musicien-interprëte, qui contróle le jeu 
sus-mentionné, soit évidente a l'audition. Le musicien n'agit que 
sur les clefs-données de 1'INTELLEC8 et par cela lance ou rompt des 
cycles de durées et/ou de voltages. 


Les patchings et réglages sur les VCS3, où l'intermodula- 
tion de fréquences aigües joue un rôle prépondérant, répondent à un 
choix esthétique; la seule exigence logique au dispositif analogique 
étant clarté et transparence des "voix". 


3. Le programme 


Il comporte! 


a) quatre Variables: DUR (= Durée) 
VOLT (= Voltage) 
RA (= valeur-correction pour l'évaluation des 
Durées) 
| VORA (= idem pour Voltages) 
par commodité les deux premières sont stockées en Mémoire, les deux 
autres dans les registres D et B. 


b) un dispositif qui lit les données aux clefs et les traite. 
ο) un G.P.A., producteur de cycles (Voltages et Durées). 


d) un dispositif TEMPS réglant les durées effectives entre chaque 
changement de Voltage. 


e) un dispositif répartissant les valeurs obtenues (Voltages) sur les 
deux canaux desortie (vers DACs). 


4. Diagrammes etc. 


1. schéma logique du programme FRAGfLA 08.2 
2. listing de FRAG の LA 08.2 

3. Schéma des branchements "HARD" 

4. patchings et réglages des deux VCS3 
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-4- 


(A) = O ? 


oul non 


| 
MSB(A) = O ? 


oui non 


e 
Ld 
; 
ク 
béi 
Wi 


ZZ 
jr 


se ተመፕ መመ a መ መ መ 


- peu 
27 277722 2:2277222222222222222222220222222222222222211. wwe fA 


シシ シンシン ング 


S 


LSB(A) = O ? 
———sh s e G v — r 


oui non 


eee 


lignes continues t suites des opérations (de haut en bas) 
pointillées : mouvements des Variables 


http://www.artinfo-musinfo.org Artinfo Musinfo # 22, 1977, page 6 / 58 


FRAG の LA 08.2 


adr. codes instructions 3 commentaires 
hexa hexa INTELGREU 
| S 06716 _ _ 
1600 44 O5 16 JMP : ; initialisation 
1603 08 01 / 08 01 / 
1605 : 
1605 2E 16 LHI 16 
1607 : 3 play 
1607 41 INI 0 ኒ A €- clefs 
1608 AO NDA 3 positionne les FLAGS 
1609 68 1B 16 JTZ :2 3 Bi (A) = O 
1600 50 13 16 JFS :Β j si MSB de (A) = O 
160F EO LEA រ E /V の RA/ <- (A) 
1610 44 14 16 IMP :1 
1613 : 
1613 28 LDA - 1 D /DfRA/ ሩ (A) 
1614 : 
1614 CB LBD រ B & DORA 
1615 A6 40 16 CAL :D 
1618 46 46 16 CAL :Q 1 DUR < DUR modifié 
161B :2 
1618 ០០ LBE ; B ድ VORA 
1610 46 43 16 CAL : 
161F 46 46 16 CAL : រ VOLT <— V の LT modifié 
1622 46 40 16 CAL : 
1625 D7 LCM រ ር < DUR 
1626 46 57 16 CAL :T 1 TEMPÓ 
1629 46 43 16 CAL :E 
1620 CT LAM រុ A ድ VOLT 
162D AO NDA j positionne les FLAGS 
162E 58 45 16 JFP :3 1 si LSB de (A) = 1 
1631 57 gUT OB 1 DAC? ፎ (A) 
1632 44 07 16 JMP :A 3 daccapo 
1635 :3 
1635 55 OUT OA 3 DAC1 © (A) 
1636 44 07 16 JMP 3 , daccapo 
1639 11640 
1640 : $; subr.: appell adresse DUR 
1640 36 03 LLI 03 
1642 07 RET 
1643 : j subre? appell adresse VOLT 
1643 36 04 LLI 04 
1645 07 RET 
1646 :Q j subr.: évaluation DUR/VOLT 
1646 07 LAM រ A < DUR/VÓLT 


1647 46 40 16 CAL : 


E 
3 
። 


DUR/V の LT ሙ (A) 
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164C :R y subr.: G. P. A. 
164C 02 RLC 

164D 24 FE NDI FE 

164F 48 54 16 JFZ 58 

1652 04 01 ADI 01 

1 694 : 

1694 13 RFS 

1655 ል9 XRB 

1656 07 RET 

1657 : ; subr.: TEMP 
1657 OF 60 LBI 60 

1659 :U 

1659 09 DCB 

165A 48 59 16 JFZ :U 

165D 11 000 

165E 48 57 16 JFZ :T 

1661 31 RET 

1662 


Connections du "hard ware" 


QUE A ይ B 
/ 
/ 
INTELLEC 8 ሪ 
IN1 kee 
2 
| 
| | 7 
fum の Um2 
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5. Chronique 


gee GF ante ees ብወመር (dP (95555 quim deen 


La pièce FRAGOLA et son programme ont ete mis au point 
en avril 1976, au cours d'un séminaire du Groupe Art et Informatique 
Vincennes à Tours. L'auteur adresse un grand merci à ses amis du 
G.A.I.V. et tout particulierement à Patrick Greussay et Didier Roncin 
pour leur aide. 

Premieres présentations de FRAG の LA à Tours et à Paris 
(avril, mai 1976). 

Une version enregistrée sur bande (2-pistes) a été réa- 
lisée par l'auteur et porte le titre: MOT 76/1 (supervision 
technique: Didier Roncin). Cette bande a ete présentée en 
public pour la premiére fois au Festival International de Musiques 
Expérimentales de Bourges (1976). 

Le programme FRAG の LA 08.2 (ruban perforé dans la 
bibliothèque du G.A.I.V.) est à la disposition de tous ceux désireux 
de pousser plus loin la recherche présente. Avec d'autres 
dispositifs analogiques ou d'autres réglages on obtiendrait une 
nouvelles version tout en maintenant l'évidence du jeu entre 
principes opposés. 
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BLUCUBRATIONS POUR 3 VOIX ET TRIANGLE 


MANTRA DANSE 


Daniel LEPAGE 


ARTINPH/MUSINFY #ሩ 22 
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Ie BLUCUBRATIONS POUR 3 VOIX ET TRIANGLE 


ESSAI DE RECONSTITUTION DE L'AMBIANCE SONORE DES CHANTS DE 
PRIERE TIBETAINS, 


19 = AVANT-PROPOS: 


On sait aujeurd'hui que le sen est une vibration qui peut 
perturber ou renforcer l'équilibre biopsychique. 


Dens l'hindeuïsme, le sen est considéró comme une thérapie 
très efficace. | 


C*est 1e "Mantra Ylega". 


Par certaines psalmedies particuliéres et précises on fait 
agir la puissance et la magie du son. 


EXEMPLE : Les structures sonores des chants de prière des 
moines tibétains. 


| Peur Jean HIBERT » l'importance actuelle du Mantra provient 
de sa récitation psalmodiée qki est réputée avoir un pouvoir 
considérable non seulement dans 18 pratique spirituelle mais 
dans tous les demaines de la vie" 
( L'hindouisme vivant Cel." Aur erigines du Sacré" 
Bdit. R LAFFOND ) 


" L'emploi du Mantra n'est qu'une utilisation consciente de cette 
puissance secrète du verbe”, 


(Extrait d'article de l'Incennu N° 2 Janvier 76 ) 


29 HETICACITE PHERAPEUTIQUE DES VOYELLES DU MANTRA 


A Agit sur la partie supérieure des poumons et 


sur le cerveau. 

Sen serein que l'on retreuve seuvent dans le 
chant grégerien. 

Il est sensé éveiller l'âme, la libérer de ses 
contingences matérielles. 


E Agit sur la gorge, les cordes vocales et les 
glandes thyreidiennes qu'il tonifie. 


Artinfe/Mosinfe 22 
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OÙ = Agit sur tous les organes abdominaux, 
Il régularise le travail des intestins 
et peut aider à se débarasser de la 
constipation. 


0 => Son grave profond, fait vibrer toute la 
cage thoracique et stimule les poumons, 
Son effet se propage aussi sur les 
glandes génitales, Il amène le calme 
intérieur, une concentration accrue et 
dynamise l'être. 


OM = Considéré comme le son cosmique, 
Il vide le mental de son trop plein 
d'images incontrolées car il occupe 
entiérement le champ de notre conscience, 


I | => C'est un son joyeux lumineux qui agit sun 
| le nez et la gorge et les bronches, 
Il a le don de mettre de bonne humeur, 


3° IDEES ET DESCRIPTION DU PROGRAMME (ALGOL 6600) 


Sulte à ces propos, j'ai projeté au moyen des voyelles 
employées dans le Mantra yoga de reconstituer l'ambiance Sonore 
des chants de prières tibétains, 

LES VOYELLES : [A E ou ០ om 1] 

J'appelle cet ensemble MANTRA, je range ces éléments dans 
un tableau de 1 à 6 et je lui donne le nom de l'ensemble : 

done 3: ! 

Ensemble des voyelles 
MANTRA 2 ΤΑ, E, OU, ο, ον, I] 


J'appelle unité sonore un élément de l'ensemble MANTRA 
done : 


Unité sonore =) MANTRA (I) 


JE DENOMBRE L'ENSEMBLE DES COMBINAISONS possibles des 
éléments d'un ensemble ; 


je génére l'ensemble des permutations d'un groupe qui est 
égal : 
si n - le nombre d'éléments 
factorielle den ( n!) 720 pour n = 6 


La permutation de référence (identité) est le MANTRA dans 
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ቿ x 


l'ordre qui est défini au départ : 
A, E, OU, O, OM, I. 


Par le truchement d'un sous-programme générant l'ensemble 
des permutations des éléments d'un groupe, un générateur de 
permutation fera le travail. 


Je stocke cet ensemble de permutations dans un tableau 
linéaire (les uns derriéres les autres) que je nomme TPERMUT 


Ens. des Permutations =>  TPERMUT (1... 720) 
du groupe MANTRA 


Actuellement j'ai donc un ensemble d'unités sonores range 
dans TPERMUT. 


Je veux maintenant affecter un facteur de répétition 
variable à chacune des unités sonores. 

Je vais prendre l'image d'une permutation (suite de 6 
unités sonores) engendrée par le générateur dans la suite 
des permutations ; car " la procédure " génération de permuta- 
tions employée ici est un générateur dit de Jhonson dont l'une 
des particularités est qu'il permet d'avoir toujours la même 
unité sonore qui se déplace de droite à gauche puis de gauche 


` 


à droite. 


En prenant l'image, j'aurai une durée constante qui se 
déplacera suivant les mêmes règles appliquées aux unités sonores 
différentes, et je rangerai les images des permutations les 
unes derrière les autres que je nomme TDURE dans un tableau 
linéaire, 

donc : 8 

[Suite des permutations inversées 
de TPERMUT (qui est lui-même l'ensem- TDURE (1.... 720) 
ble des permutations de MANTRA] 


Mais je ne considére plus les éléments de TDURE comme 
des unités sonores mais comme des facteurs de ré étition. 


r 2៦ [ 3 [e 13 To Ds] e| τὶ 819 1. τι] τα 


miroir 4 
oe 2 [፡1፡1፡1፤1፡1፡1፡1፡1፡ሻሻ፤1፣- 


A chaque élément de TPERMUT je fais correspondre un élément 
de TDURE 
donc 


permutation 


[: 2 3 እ 5 6 7 r TP ERMUT en regardant pour TPERMUT 


de gauche 4 droite tan- 
dis que pour TDURE de 
ង 5 上 3 2 1 f TDURE droite à gauche 


http://www. artinfo-musinfo.org Artinfo Musinfo ἡ 22, 1977, page 15 / 58 


Séquence (restreinte pour cet exemple) 


1 1 1 1 1 712222233 33 LYS 5 6 ........ 


done l'unité sonore 1 de l'exemple a une durée de 6, 
on la répétera 6 fois. 


Cette procédure engendre une nouvelle suite que j'intitule 


SEQUENCE. 


Elle comprend 21 éléments identiques ou différents suivant 
le facteur de répétition TDURE et qui porte le nom SEQ. dans le 
programme. 

Je crée 3 séquences (autant que d'exécutants). 


SEQ 1 ----- + VOIX 1 
SEQ 2 ------ 3 VOIX 2 
SEQ 3 sss > VOIX 3 


Si je regarde les tableaux SEQ, il y a des changements 
d'unités sonores; à chaque changement ΥΠ fera sonner 
un triangle 

donc 


pour chacun des exécutants il faut wn tableau de la pnésence 
ou non du triangle. 


Tableaux binaires des 
rythmes (triangle) ` RITH 1, RITH 2, RITH 3 


Si 1 alors triangle, sinen rien. 
Les tableaux RITH auront autant d'éléments que de structures 
sonores dans les tableaux SEQ. 


J'utilise un générateur de nombres aléatoires (tirés au 
hasard entre 1 et 6 ). 


Je déterminerai à l'éxécution la valeur réelle de temps de 
la totalité de la séquence. Je pense à priori sectionner @haque 
Séquence (21 éléments) en période de 3, représentant dans le 
temps le plus petite capacité thoracique des exécutants. 


Maintenant je génère l'impression d'une partition. 
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‘ (12000 
ICIzPOINT DE REFAIRE DANS LE BAILLAIGE DE ÎPER 
VVV=L EXECUTANT FAIT SONNER UN TRIANGLE 
4 # ა ჰ§ # 43 X % ს ἡ + 8 nel ሱሊ 


FORCE= 1 e 3 4 5 6 TRIANGLE 


VVV 
I 
VVV 
I 
VVV 


T 685 


1 I 
I 1 
I I 
I I 
I I 
I 1 
፲ I 
coU 1 I 
I I 
I I 
I I 
I I 
OM I 
I I 
I I 1 
II I 
I I 
I I 
E I 
I I 
I I 
1 OU I 
I I 
OU I 
1 I 
I I 
I I 
I 


i I 
1 I 
£ I 
Í I 
A I 
I I 
I I 
1 I 
I I 
Ü I 
I I 
1 I 
1 I 
1 1 
1 1 
1 1 
1 1 
1 1 
1 I 
1 1 
1 1 
1 I 
I I 
4 | I 
I 1 
A I 
A I 
i l I 
I H I 
l I I 
I I I 
I I 
1 I 


i 
I 
1 
1 
1 
1 
I 
1 
I 
I 
1 
1 
j 
1 
i 
1 
1 
1 
I 
1 
I 
I 
1 
1 
1 
I 
I 
1 
ል 3 
1 Í 
I 1 
0 L 
I 1 


L 
1 
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Quelques pr&cisions sur le probléme "spacio-temporel" 


Les partitions pour chaque voix sont constituées de 21 unités 
sonores que j'ai intitulées SEQUENCE, mais en fait il faut 
ajouter aux unités sonores l'instant nécessaire pour faire 
résonner le triangle, action que je désirerais franche de telle 
sorte que le son se propage longtemps et se mèle aux autres 
effets sonores, 


donc 


Je considsrerai l'espace temps triangle égal aux 
autres unités de temps toutes égales, 


Le départ du jeu étant donné par le triangle respectif de 
chaque voix simultanée 


donc 
UT ጭማ unité de 2 quelque soit l'unite > elle a une zB cette durée est 
temps sonore de Mantra égale durée égale à l'espace 
temps de jeu du 
triangle 


Cette UT sera fonction des exécutants, je mesurerai 
le temps d'expiration totale des chanteurs et me 
réfèrerai sur le plus petit relevé que je diviserai 
en 3 (ce qui constitue l'UT de référence), 
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Il» MARTRA DANSE 
SUITE POUR TROTS DANSEURS REGIS PAR DES LOIS 


DE L'ENVIRONNEMENT SONORE 


Comme je l'ai céjà formulé dans la première partie 

" Elucubrations pour 3 voix et triangle ", je voudrai 
essayer de supprimer le côté rébarbatif de l'écoute 
exclusive de " Suite cognitive d'éléments ou d'ensemble 
d'éléments variables sonores " en apportant une 
réalité visuelle. 

Soit une association, générations, sons, couleurs, 

ou cinétique d'objets gérée par l'univers sonore 

créé ou encore comme dans le cas présent en utilisant 
des danseurs gérés associativement avec le monde 
Sonore engendré. 


Dans ce cas l'univers sonore va générer également les 
déplacements dans un espace scénique et aussi nous 
guider sur 1a signification du monde gestuel engendré 
par les danseurs., 


Le but étant d'associer 4 chaque structure sonore un 
attribut gestuel, L'enchainement des unités sonores 
créra un climat que l'on retrouvera suggeré par 
l'attitude des danseurs. 


En aucun cas je veux remplacer la créativité de 
l'individu, au contraibe c'est dans cette optique 

que je me bornerai à indiquer une idée, une "atmosphére" 
associée à chaque unité sonore et à régler uniquement 
l'aspect géométrique du déplacement. 
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DESCRIPTION DU PROGRAMME ET UTILISATION DES RESULTATS, 


Ce que je posséde déjà dans le programme musique : 


SEQ ጫቅ] Suite des 21 unités sonores] 


ALEA une procédure donnsntä chaque unité sonore une fored 
de jeu aléatoire 


Ce sont les seuls renseignements dont j'aurai besoin pour 
régler les déplacements. 


Un espace scénique dans lequel je ferai évoluer 
3 danseurs [autant que d'exécutants). 


est associé 


DES 1, SEQ 2, SEQ 3 < respectivement = DANS 1, DANS 2, DABS 3 
— — — — 


3 exécutants | 3 danseurs 


Je le considère comme une matrice binaire dans laquelle 
Kaal, d ያ 9 ቃ 

O représente le vide (non présence de danseur) 
*1"Présence de danseur (sa place) 


ESPACE ( /H 0 /) æ espace scénique total 
-7 Z Z ンー 


P PA 


ሥ 
Z 
Ζ 


PUBLIC On pourra représenter cette figure 
sur le plateau de façen à 


permettre une meilleure mémorisation 
du danseur. 


TABLEAUX DANS (I) 


DANS 1, DANS 2, DANS 3 sont des tableaux constitués de 


doublets dans lesquels le 16 élément représente 
l'unité sonore et le 2è la force de jeu de cet élément. 


Donc la longueur de ces tableaux est le double de SEQ 


i c'est-à-dire 42 elements, 
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ESPACE 


est le nom de la représentation de la situation 
topologique d'un danseur à un instant. 

Elle est générée par l'analyse successive d'un des 
doublets de l'un des tableaux DANS (I) 


Le 1 er élément génère la colonne (unité soncre) 
le 26 . " " la ligne (force) 


Plus l'unité sonore est ferte plus le danseur se 
rapproche du public, il change de colonne lorsque l'unité 
sonore est différente. 


Si une suite de doublets possède la même unité sonore 
mais des forces différentes, ces forces feront descendre 
ou monter vers le fond de la scéne (de façon À suivre 
l'effet modulatoire de l'unité sonore) 


Si deux doublets sont d'unité sonore différente, nous 
avons vu qu'il y a un espace temps pour faire sonner le 
triangle qui donnera au danseur le temps pour effectuer son 
changement de colonne 


Pour chaque danseur je genère une représentation 
géométrique de son déplacement, autant que d'unités 
sonores dans SEQ (I) où pour une meilleure visualisation 
ses nouvelles coordonnées sont indiquées par le chiffre 2 


zFORCE 
en D en em Ü = = 0 ence 0 == 1 
=0 መመ Den em Ser Um e 0 == i መጋ 
=0 こ =0== こ 0= こ =0= こ こ 0 こ = ここ 0 こ っ 3 
መዕ == 0“=0፡ወ= D e en D e en e em éi 
こ 0==0= こ 0 ここ 0 ここ 0 ここ 0 こ こら 
=0==0==0==0==0==0==6 
FACE ልህ PUBLIC 
1 ご = の ーー うこ ご 4 ここ 5ー こ 6csUNITES SONORES 
-AT-ET--0U-0--OM-I-sELEMENTS DE MANTRA 
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CONFIGURATIONS DES DÉPLACEMENTS SCENIQUE DANSEUR, 559854 


0 [ደል] 0 0 ο ο 

0 0 0 0 0 0 

0 o 0 0 0 O 

0 0 0 0 0 0 

0 0 0 0 0 0 

0 0 0 0 0 OANCIENNES POSITIONS SUIVIT DE LA NOUVELLE POSITION 
**UNITE SONORE= ]"**FORCEx 2 

Am) 0 0 0 0 DANS L ESPACE SCENIQUE2sSITUAT ብ 
0 0 0 0 0 0 zt ATION DE LA NOUVELLE ρος]τ]ρν 
0.0 0 0 0 O 

0 0 0 0 0 O 

0 0 0 0 0 0 

0 0 0 0 0 OANCIENNES POSITIONS SUIVIT DE LA NOUVELLE PUSITION 
**UNITE SONORE= 1###FORCES= 1 

Fei 0 0 0 O 

0 0 0 0 0 

ი oel2} ο o ο 

0 0 0 0 0 0 

0 0 0 0 0 O 

0 0 0 0 0 OANCIENNES POSITIONS SUIVIT DE LA NOUVELLE POSITION 
**UNITE SONORES 3%*%FORÇCEm= 3 

1 1 Ba 0 0 

0 o 0/0 0 c 

9 0 0 0 0 

0 0 0 0 0 O 

0 0 0 0 0 O | | 

0 0 0 0 0 OANCIENNES POSITIONS SUIVIT DE LA NOUVELLE POSITION 
*#UNITE SONORE* 1**«FORCEm A ! | | 

1 1 0 ar 0 

ο 0 0 0\0 ο 

0 0 1 040 0 

0 0 ο ο [፪ 0 

0 ο 0 ο 0 C 

0 0 0 0 0 OANCIENNES POSITIONS SUIVIT ሀዩ LA NOUVELLE POSITION 
**UNITE SONOREs 4***FORCEsx 5 


Maintenant chaque danseur possède une représentation de 
la place qu'il doit avoir à chacun des changements de 
force dans une unité sonore ou pour chaque unité sonore 
différente. 


11 ne reste qu'à indiquer la signification de son 
mouvement pour chaque place (instant). 


On a vu que dans ESPACE il y a 6 colonnes représentant 
chacune une unité sonore du MANTRA 


donc : 
1 2 3. h 5 6 
à + $ + ἡ + 
A E OU 0 OM I 
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Dans quelques lignes précedement (18 partie) j'ai 
essayé de préciser l'effet de ces sons thérapeutiques 
sur l'individu. 


J'ai voulu créer une continuité des effets sonores dans 
les mouvements des danseurs, 
J'ai associé à chaque unité sonore un "esprit gestuel", 


Unité sonore Correspondance danse 
An Il doit se dégager un esprit de libération 
E መሙ une impression d'activité 
OU መሙ Une forme de sensualité 
O መሙ légèreté du style (sauts) 
OM — | ーー sensation d'équilibre, sérénité 
I une grande gaité 


Pour chaque correspondance le danseur devra trouver des 
degrés (6 degrés). Le paroxisme devant être atteint pour la 
force 6 (positien la plus proche du public ). Si la ferce dimimme 
le danseur va vers le fond de la scène en descendant dans les 

degrés de 1* "esprit gestuel", 


4— 


–3–კ E E 
Degré d'intensité 


–უ–კკ_-_- 
| I correspondant & la force 


d 
2 
— — 3 
A 
5 
—P@T force C 


PUBLIC 


Chaque "Pas" d'un degré d'une unité sonore et pour toutes 
les unités sonores devrait s'il se répète au long de SEQ. 
être toujours le même, l'unité sonore ne changeant pas 
elle-même de structure, 


Chaque danseur étant par définition entièrement libre de trouver 
son vocabulaire, aucune voix étant identique et associant à chaque 
voix un danseur il serait absurde d'uniformiser le vocabulaire, 

Ceci laisse malgré tout un champ vaste pour la création individuelle, 
J'espère seulement que les danseurs et les chanteurs soient les 
mêmes personnes de telle sorte que leurs timbres soient associés à 


leur vocabulaire d'expression corporelle pour une meilleure 
homogénéité, | 


VINCENNES Fev 1976 
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ន" T 
ALGOL=60 VERSION 4.1 LEVEL 0004 


まじ BEGTN デ 
À COMME I TTT μμ TTT ο 


DECLARATION 
+ Se dp 4 კჯ Ἡ th 4E 96 4 δ ὁ} # ὅς $? th 45 + 46 30 4t 46 % «ს 44 49 45 ჰა tb 2 δε δὲ 4 48 4. 45 ὃς db ას EP HH qp Ὁ ὁ} tb 48 49 45 46 tt +P 0 პს + 48 


1 

e 

3 

4 

5 e 9 

6 COMMENT H Ree ee Hee, TEU DE RLNGEMENT LES νι ας Εμμ ብ ህመ à de anne 

7 SIN TEGEH*NGPER,.1 

8 INTEFEGER ば FURCEZ 。$ 

9 ま J(、TEGER そ CT。5 

10 £liuTEGERZFORCE,, 

11 ZINTEGERZAL »DURL . 9 

12 FINTEGERFBUITE sCOMPT e 9 

13 € COMME INT σσ de dh de Ae dt it 3t te μαμα μυ 4 ቁ ቁ ተ ጉ 4 ኑ () 1 NTEUR DE LISTES 

14 *INTEGERxC,» 

15 #INTEGERS He $ 

16 ZI: TEÖLREK L. , 

17 HINTEGER*Ne Ir des 

18 #INTEGER#E O H, 5 

19 COMMENT £ oe ce te se de en 3t at te % tt a 4 4 +] እእ | EU 448 SE tt ab ae at 59 ተ ተብ 49 απ 49 δ HO 4h % 4 MM 949 
0 *INTEGERÉÉARRAYFTRANS (410043207) εν 


1 INTEGER ま * ま ARRAY ま PERMUT (/1,,9/),, 
22 HINTEGERF#ARRAYETPER (/1,,*3፡0/) 08 
23 #1 「EGE ド まま ARRAY を TDURE(/1。。432n/) os 
24 *1NTEGERÉ*ARRAY*SEQ1 (41.0217) , በ 
25 FINTEGERFFARRAYV ASE QC (/1.. C17)... 
26 *INTEGEREZARRAYzSEuJ(/1.,21/),, 

27 ま TMTEGER を まま ARRAY ま RITH1 (Slee 1/),95 


28 #1. TEGERSSAPRAVENITHE (0121210110 
29 ÉINTEGERFFÉARRAYÉRITH3(/1,,21/) 


30 ad 

31 まそ TNMTEGER ま そま ARRAY ま DANS ど (/]。 6 5%2/)., 

32 #1: TEFGER を まそ ARRAY ま DAIS3(/1。。4Z/) 55 

33 ま INTEGER デ チチ ARRAY デ ESPACE【/1 。。69 1 。。6/) , 

34 生か か りか で サル ペタ の か 
35 INITIALISATION 

36 WD 4» 4e 4 10 Ὁ 0 ጅ ብ 49 Ὁ 4€ 36 444 ቀት 4 40 49 Ὁ 4ቅ ጉ 4ቅ 46 ቭጉ 40 4ኑ 4 40 4 ብቶ ቁቅ) 0 46 4 ጉ ብኑ δ 49 Ὁ 4 ቆቅ 5 Ὁ 8 8 δ Ὁ 0 49 2 II δ 0 99 
37 e? 

38 AL oem! 99, 

39 Ne ο6 ο} 

40 “9 ο: ο 

41 COMPT 5ο ,=/' + + 

42 HANTEN 
43 LECTURE DES DUNNEES 

44 ENSEMBLES DES VOYELLES DE MANTRA 

45 d di tp dp dp % % 4  % 4 % AR % 49 4 db E 4 4 ብ 4 % 48 AE + ង EEE 
ሬይ = 

47 LivWARRAY (Sc ,PERMUT) en 

48 COMME Iv T X ett ተት 40 48 dp te FF ង + dt 48 ዝብ AE At E AH Gh ង dt %% 4 4 4 %% 4 4, % » 44» d dt Gt 4558 
49 GENERATION DE L. ENSEMBLE DES PERMUTATIONS Du GROUF 
50 MANTRA 

51 4 4 ას 4 ብ # 4 t «ს 45 ጉ AC ቂቅ ጉ ተኑ 49 4 49 ብ + ብቅ ἢ ძა ተ + 4L St 4 49 46 4 ጉዙ ብቭ ፋቶ Ὁ 4 4 ዙ ብ ቁ) ብ ተ δὲ Βα ጉ Ὁ ΔΒ 15 δ კჯ Ὁ კს # პს «ა a 
52 គី 

93 RETOURDe e 

S4 COMPTeesCOMPT*12,, 

55 #FOR# Ieezi 4STEP# 1 #UNTIL#N=1l #00% 

56 ZHEGINE 

57 BOITE。。=PERMUT (/I/) os 

58 PERMUT (/I/) ee SVERMUT(/1¢1/) ου 

59 PERMUT(/1+1/) ee =BUITE. » 


http://www.artinfo-musinfo.org Artlnfo Musinfo # 22, 1977, page 44 / 58 


G0L-6- 


100 
lol 
loc 
103 
404 
105 
106 
1ი7 
108 
109 
11ი 
111 
112 
113 
114 
115 
116 
117 
118 


-28- 


VERSION 401 Ἢ LEVEL 000% KAALUL | ( 


FORK esl eSTEPs; guNTIL gives 04 
FRE GINF Je e SUF les PER(/ZJ/) ee FRE RMUT (/አ/)# e Eisen 
FEINDE ae 
leezles 
oVITEeesPE RUT (/1+1/), 4 
PERMUT (7]+]7) 。。 ミ PERMUT (7/17) ἐν 
PERMUT (elei ዓዳኢጻ=ክሀህ11ር5595 
FoRsK«esleSTEPaisUNTIL2NxUGOS 
#BE GINEJ..2J*1.» TPER(/J/) +, ,8PERMUT (/ሾ/) „ HEIN ee 
ZFURZI&..«zNzSTEPx-i£zUNTILZ?OZUO£Z 
seoEGIiz 
BUITEee@PERMUT (/፲/)054 
PERMUT(/ IZ) 。。=PERMUT(/ エ < こ 1/ ) ა! 
PERMUT (/1=1/) εξ Τεν 
SE OR テ K 。。 ミ 1) テ STEP ょ た] まそ UNT エ し テ い まじ 0 ま 
ΦΘΕΘ]Λ ο ςΞώ 1 TPER(/J/ ) 。。 モ PERMUT (ΚΡ κ 4 ቓዬካህህሣጆ6ፃ 
*l D» | ーー 
[ὁ ος ο 9 
BUITE se SPERMUT (/IM/) oe 
ኮኔክክህገ (/ዘዜ/) ee SPERMUT (/ክ= Z) os 
PERMUT (/N/) ««=00I1ICი,; 
FOR ま K 。。 ニ 1 STEP) #ህከክ] 11. #2”#ህህ። | 
BEGIN Je 。= ミ J*1。? TPERI/ Al, ,SPERMUT ISK) κα. «Ἐξ 8 κα. 
ま 1F ま COMPT ま し LESS を 72 gTHENZZGUTOZRETOUHRD,, | | 
OUTPUT (Ol et (#/+#(#TPLR=TABLEËEAU UE TOUTES LES PERMUTATION D UNE STRUCTURE 
SONORE DE ο ELE ENTS#) #2) 8) o, | ー 
OUTPUT (61** (*72.(/*35B8*]U*206*]D0*20» ]Us2d* 1Üv2B* 1 UI 28910) X) Y TPER) 。$ 
QUTPUT(Ol,» £(**(£tsttecet*EFIN DE TPEHse*z)3É£)z).. | ! 
# COMMÉN T E 4h dh 4e dt % % % + % db ង » 4 AE » h Ah E GE 4h 49 98 6 4 EE %% 999. 4 4 2 # 4 % 49 4 ትብ ቨን 5 % 4 4 % 4 ትቭ ዙ ሹ % ៤ 4 
TUURE=SU1 TE YES PERMUTATIONS INWVERSES UE TRER QUI EST LUI 
MEME L ENSEMBLE DES PERMUTATIONS UU GROUPE MANTRA | 
MAIS Je NE CONSIDERE PLUS LES ELEMENTS UE TDURE COMME 
DES UNITES SONORES MAIS CUMME DES FACTEURS DE REPETITIONS 
ASSOCIES A CHACUN DES ELEMENTS ሀር TPER 
ud 2 2 2 48 4 4 2 2 2 2 2 2 2 2 2 «ს 2 «1 te dE X «გ 98 dh + 41 de de + 4 Αα ΣΑΣ ៤4 # # « # დ 4 Ah 8 4 4 + 4 ΦΥ 4 ውቁ 


ο) 
ΝΘΡΕΒ 6 ፀ9ኞ0959./59=()99169=(95 
RTUURE 5 5 
፲5,:=1ቀ(39 ata #9=./ቃቀ.,59 
TOURE (/J/) ა «STPER(/1/) ο 
156:=[”ሙ196 ፃ:.ህዕ 9=ኒ;)›ቀ κα ϱ 
TOURE (7/7J/) eo esTPER (/1/1)5ፃ 
ია ολ ον να” 
TOURE (/J/) ቆቆ=ጆፐ“ርኮ(/፲/)])55 
IeezIT7le9*Jeoe7J*1,* 
TOURE (/J/) ee TRPER (SIZ) ο 
፲፡951መ1 5 5./, 95ህ+፡.95 
TDURE(/J/) ა »STPEK(/I/0»09 
1፲5520=51”ሙ] 5 945 οΞι}9 οφ 
TOURE (/J/) 。。=ETPER(/1/) 。6 
NBPER. ა #NBPER*+1,. 
I,.znBpEr#d,, 
AIF ALENOTEUUSL EFS Cy eO Z THENZAGOTUARTUURE κα ቁ | 
OUTPUT (6 1。 ま (まき る を そ ( ま A CHAQUE SON p Une STRUCTURE EST ASSOcIE UNE FUNCTION 
DE REPETITION D UNE VALEUR DE 1 A o FulsS LE MEME SON #)##)#),0 
OUTPUT (Ol (#/2" (/ 13589109 26510, 28.410, 2, lU 269109 26,5 10) 8) ge TDURE), 。 
OUTPUT (619# (Zx(29999*FIN DE TOURE£) ##)#) , 
A COMME TS T attt 3E a ob %% ERE EIE IEEE AE dH didi EE 49 HF HE ME db HERE ህዝብ Gh 48 OSE ዝው ab GE HE 2 EA 48 Gi 4 46 44 
CREATIUNW DES SEQ LE 21 ELEMENTS IvENTIWUES ህህ UIFFERENTS SUIVANT 
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VEPSION 451 LEVEL 0004 XXALGUL 


FACTEURS DE REPETITIONS SEQ] SENZ SEQ3 CORRESPUNUANT A 
VOIX1 VOIX2 VOIX3 | 
+ % 44 4 + 49 # de ተ + 4 + 4 % 41 +% « 4 % 49 «ს «# «ს «ი 4 4 «. დ აა 4 %% «ს ბნ კს 44442 dé + Et de 4 «ა AE e Ae de dp Ae H DEET I 21% 5 TEE 
e? m 
Wa, ze3Cl, 6 
leet ο 
wee ο) ፪ 
SE 0ሻዳጻቓህዩፅሪፅ=1#:21ኪፒዞ፣ . ,.ህ/4 1 ኾ#፡1#ሠ0# 

vi I CC1M# 

WeezWTles. 

CoonConlos=i+l,os 


SEQl(/J/) e eB TPER(/I/) en 


RET1,..sCeeZC*lesSEUL (/J/) 。。=TPER(/1/) »» deez Jeles 
*IF* TOURE (/w/) #GREATER#C *THEN* *GUOTO* ዞርፐጌ›፡ 
J。。 ミ J"1。$ 

FENDE.» 


OUTPUT (9) ,%=(#*,»(#%%%»»%%%២( រន) #*)») 69 
QUTPUT (616 ま ( ま ど 1 (CB。1U) そ ) そ 5SEQ1) ο 
OUTPUT (Ol 5? まそ (まま ( デ せ せみ FIN VE SEQ#) #4) #) ο 
Κος ο, 
#FORZKe s5 #STEPFLLUNTILF21 #00 
#bEGINZ 

Νεο SEN let 

ο ως αλ 

SEW2(/K/) ee =#TPER(/I/) 9 | 
RET2.« Cos=Ctle? SEQR(/K/)e.z=TPER(/1/),9 Kahl,’ 
#IF# TOURE(/W/) #GREATERzC ÉTHENX #GOTO# RETC ee — | | 
K 。。 ュ ミ Kー1。6 

ἘΕΝΌ 8 ο 9 
OUTPUT (15# (#//// vt (FEMHOHSE RK E)Z) ον 
OUTPUT (612 (#21 (28910) κ) #9SEG2) 56 
OUTPUT (Ol et (## (#*##F IN DE SEQ#) 4) κ) 45 
!ር968=19ፃ 
HF ORS Le e=lL¥STEPHLZUNTIL 61ο 

BEL AN 

We 。 ら リー1。$ 

μμ ο ολ 

SEQ3(/L/) , STPER(/IS/) 。6 


RET^.» ο ο los SEQ3(/L/) ee zTPER(/SI/) 。6 し ゃ ゃ だ し ?1。$ 
site TOURE(/W/)  #ዕሾኮ፻ጀል!ዩክጾ#ር ま THE い ま #GUTO# HEITZ, 
Lee ëLsle? 

#ËENDZ e; 


OUTPUT (619# (ቐ/////4## (FPRHHSEQS EF) ##) κ} 0 0 
OUTPUT (61»*(€21(28, 10) €) ἀν SEQ3),, 
OUTPUT (612 (まま (#w#*F1N DE 5Ε6ἑ} {8} 4) ο | 
F COMMENT À t usta 97 5 » % + + 48 + + C დ Gh + % + 4 % % FE 4 # # 88 dE dt 4 # + 4 # # % ៤ 4 4 4 # # 4» # 6 AE AE te # # + + + ' 


HEMPLISSAGE DE RITH -BINAIRE- DE LA PRESENCE DE 
RITHME DANS LA SEQUENCE =1=V = ÜzF- --ASSOCIE A SEQUENCE 
SI RITH: RITH RITH3 SONT VRAIENT ALORS し EXECUTANT FAIT 
RAISONNER LE TRIANGLL 
ស្យា. 
LI ος.) ος ος ο) 
FOR ま J。 。 モ 1 を STEP ま 1 ま UNT 1 #1 #ሀ 0# 
zBEGINe | 
#X#I” #50 (/J/) ま NUTEQUAL ま SEM1(/J*1/) チ THE」、 ょ RTTH1(/J ゃ 1/) 。。=1 ま ELSE ォ テ 
ΕΙ ΤΗ] (9914) corres 
ΚΕΝΌΝ» 
Je, 2l os RITHl (/ህ/) ο 314 9 
OUTPUT (61»€(/////,*(* TABLEAU DES RITHMES ASSOCIES ^ LA SEQ] 4) Κα κ) os 
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-30- 


VERSION 4.41 LEVEL 0004 ARAL GOL 


OUTPUT(61» s*(s21(289*10) κ) es RITH1), ი 
OUTPUT(GlsX*(Z*(i£st*9*FIN ሀር RITHIÉ)*£)*2.. 
ZFORZK. eH LESTEPSE! ΜΙΝΙ Τι ο] κο 

xBEGINz 
IF*SEQO (/K/) € NOTEQuUALXSEQ/ (/K+1/) 8 TRE WERT THe (/Kr 1 /) eos] FELSEF 
RITH2(/KY1/)。。= ニ Je 5 

ま END デ 。? 
K。。=1 eyRITH と (/K/) 。。=1。5 | 
OUTPUT (61## (ቓ/ሥ////፥# TABLEAU DES RITH-ES ASSOCIES A LA SEU2#) ##)#) 66 
OUTPUT (ele #(#21 (28ፃ1ሠ)#)# ያ ፲ፐክረሪ)ቱ | 
QUTPUT(61*# (FF (ይፁቆቋቆ”ኾዞ Iს DE RITHEFIFFI FR), 
#FORzL ο zm1zSTEPz12#UNTILz21z00z 

zBEGIN¢ 
#1–45603 (/L/) NUTEQUAL&SEQ3 (/ し ゃ 1/) ま THEN ま RTTH3 (/L+1/) vem] #ELSES 
RITH3í/L*1/) „Si 

sE NO? og 
LesmloesRITHJ(/L/) 。。 モ 1 ο» 
OUTPUT (61»* (#///// 6 % (TABLEAU DES RITHMES ASSUCIES A LA SEQ3#)Z%#)#) a? 
OUTPUT (61» nina (29 01D) was RITH3) «9 
OUTPUT (61, (## (S** «FIN DE RITH34) ER) #4) 0, 
R E a aA p PI --_- 

ELABORATION DE LA PARTITION DES TROIS VOIX - 

ងា. 


ICL, enee 

នន 

OUTPUT (61 +,»(*30=)#,101) ο 

OUTPUT (6197 (K/»*(*ICIsPOINT DE REPAIRE UANS LE BAILLAIGE DE 2. 

) ee 

OUTPUT (61? ま ( ま /6 を ( ま VVVsL EXECUTANT FAIT SONNER UN TRIANGLE ま ) ま を ) ま ) ον 

OUTPUT (61 (ΑΛΦΑ ΑΦ Φ 49 VOT Xe LEHRTE de % dé de 4 % 4 % Gh % 4 % 4 4 ቡቡ ሹቡር Vol 

K a p me W DE AE AE AE E AH AE DE AE )კც!IX=3.%) ##)#), 

us d EE 1 ខ 3 4 S ὁ TRIANGLE FORCExI ន 3 

ង TRIANGLE FORCE ェ 1 > 3 4 5 6 TRIANGLE ま ) $3) $).» 

Pd μη» I I I I I I I I I 
I I I I I 1 I 1 I#)#%#%)#) ი | 

J。。= ニ Keo。SL。。 ニ 066 

Booties 

PLUS,» ICI, ,.2ICIS!,, 

AL, „ფტL#13=4L#13»0IV#21093#1093,, 

FÜRCE2.»«SAL-*AL*UIVs6*6*].5 

Jes S 1ο) 

E. .sE+l, 9 

DANS1 (/E/) oe BSEUI (SU) o9 

E,.z=E+ of 

DAWSI(/E/) 。。= ニ FORCE2。 9 

#IF#RITHI1(/J/)#€QUAL#1#THENZ 

OUTPUT (Ol # (#/+# (# I I 

#IF#FORÇE2zEQUALz#1#2THENz2#ƏEGINA 

#IF#SEQ) (/ጋ/) FEQUALZI FTHENA 


δ-- 
δ- 
፦ 
té 


ሃሃሃ #)##)ጆቓ) 5 6 


OUTPUT (61 §#(%#/§#(+« A I I I I I I ぞ ) ま ま ) ま ) 。6 
ま 1F メ SEGQ 1 (/J/ ) まし に は UAL ま のど ま THEN ェ テ 
OUTPUT (619# (#/ + # (# ន I I I I I I #)##)#) oe 
#IFASEU] (/ህ/) EWU AL 434 T HENS 
OUTPUT (61** (F794 (# OU I I 1 1 I 1 %)#%)%),° 
s&IF2SEQl (/ህ/) *EQUALZ* STHENs 
OUTPUT (91 9#(#/ 94 (# 0 I 1 I I I I *)*x)*),) 
#I”C #5LVI1 (/J/) EMU AL #52 THEN 
OUTPUT (61* * (#79 (# OM 1 13 1) I I 1 Ας, 
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ALGOL®60 


237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 


e5] 
ese 


253 
៩54 
255 _ 
256 
e57 
258 
259 
260 
26} 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 
273 
274 
275 
276 
277 
278 
279 
280 
28] 
282 
283 
284 
2ც5 
286 
287 
288 
239 
290 
291 
292 
293 
294 
295 


- 31 -- 


VERSION 41 LEVEL 9904 


HIF 4SEQ] (#។/ ) ይዬ wUALZO4 THEN 


OUTPUT (0]+,»#(=/+»(# 11. 1 
δει Όσον 

SIF AZFORCEC SECQUALZZ24TNENZEKEG Ly 
OUTPUT(6l1sst(*/»£ (# I I 
FIFFSEQ) (4457) FEQUALFLETHENZ 
OUTPUT (6) «#(#/##(Xჯ I A 
FIFSESEQ] (/U/) *CuguALcTHENs 
OUTPUT (Ol st (#/ s # (# I t 
#IFFSEN] (/ህ/) FEQUAL e324 ! HEZ 
OUTPUT (61 9* (#/ +# (# I OU 
FIFFSEQ] (/U/) FEQUAL S44 THE NZ 
OUTPUT (Sl ot (#/ 3 (2 I ሀ 
#IC #5ხს1 (/ህ/) FEW AL tbe THE 
OUTPUT (61?9%(%/X+(:7% (# I 0M 
#IFASEU! (/J/) FEVUALZORTHENS 
OUTPUT (91#ፉ (#/5ጾ (# 1 II 
$E Dion 
*IFÉFORCE2*EQUAL*3ZTHEN**BEGINX 
OUTPUT (61»e (HK /ı # (# I I 
ቓ]10#ፍርህ]1 (/“ህ/) *t£uuAL*1*THENe 
OUTPUT (61, z (2#/ sk (# 1 I 
FIFFSEUL (757) FE QUAL #24 THEN? 
OUTPUT (6] 1#(#%/§#(# 1 I 
*IF4SEQ) (/ህ/) HE WUAL#ES#4THENe 
OUTPUT (ol pt (#/.# (2 I I 
ま 了 F チ SEM1 (707) FE QUAL #4# THE NZ 
OUTPUT (61##(#/#8#(#። . ፲ 1 
#IF#SEQ!1 (/.ህ/ ) ま E は UA し まつ ま THEN ェ + 
OUTPUT (619# (ቐ/95ፆ(# I I 
#16775690) (/ህ/) #ር ህክህል'ፌጆ#6ቾ | ዘር # 
OUTPUT (61** (#/ 9 (# I I 
*€ENOxXe» | 
xIF£FORCE2zEQUAL xegTHENZxBEGINZ 
OUTPUT (61## (#/95ፆ(# 1 I 
FIFFSEQ) (497) FE UUALÉLFTHENZ 
OUTPUT (61 et (#/)5ፆ (x I I 
ZIF*SEUL (/ UZ) FEWUALF#C#HTHENS 
OUTPUT (ዕ149# (#/5# (# I I 
FIFFSEUL (497) FEUUALFIFTHENE 
OUTPUT (els#(#/ı #8 I I 
IFesEQl(/J/)*tugALz*s*xTHENx 
OUTPUT (6) 9#(#/9#(# I I 
*IF*ÉSEQl] (/ )/ Fe UAL FD* THEN? 
OUTPUT (6) 2#ჯ#(#/ ,# (# I I 
HIF RSE] (/J/) FEWUAL SOR THENE 
OUTPUT (ol x (#/y# (2 I I 
FENO*.? 

AIF FFORCESSEQUALESETNENZEBEGING 
OUTPUT (ፅ19#(#/4#(። — I I 
AIF ¥SEML (/ህ/) #ፆደ ሣህል #1# HENS 
OUTPUT (61 94 (*/»** I I 
#IFASEUI (/ህ/) ÉEUUALAC ÉATHENSZ 
OUTPUT (619# (#/s# (# I I 
AIF #SEM] (/J/ ) FESUAL #ጋ3#? HEN? 
OUTPUT (61 94 (#/9#(# I I 
#]5#5ዩህ1 (/ህ/) FEQUAL #9 4THENS 
OUTPUT (Ol se (#/ +# (# I I 


#16 #5ርጩ] ( /J/ ) ቆዷቨህልዚጆቹይ2ጆ# THEN 
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Om 


XXALGUL 
I I 
1 1 
I 1 
I I 
Í I 
1 i 
I I 
I I 
I I 
1 I 
I I 
I I 

d I 
I I 
I d 
I I 
1 I 
I I 
I I 
1 I 
I I 
I I 
I I 
A I 
Ë I 
ህህ 1 
ሀ ፲ 


FPF) 7) . + 


*) #*)#*) ,+ 
Z)2%)%) ου 
#) そそ) ま ) ον 
'ሦ)##)ጆቻ),ዩ 
#)##Z)%),°* 
#) ##)#) ) 


#)##)%#),* 


$)t2)*2).)» 
#)%#)%). 
#)#%#)#), ° 
eieeiei, 
ΤΊ 
$)**)2).» 


*)2*)9*). 


#) ##)X#).ი 
#)##)%).9 
ጅ)##)ዎ)ሪ5ፃ 
#)#%)%), ° 
F)##)#)09 
#)#X#)#)აი 


#) ##)#)ა§ 


#) ΕΕ} αὶ) ο 
$)**)*).» 
#)##)#),0 
*) まま) ま ) κ 


#)##)%#), — 


- 39 - 


VERSION wel] LEVEL 300% XXAL:UL 
OUTPUT (Ole z (#/ sz (2 I I l 1 OM 1 
#1 ት#ፍዬህ] (/ህ/) FE ህህሓኒጆሮቻ ncs 5 
OUTPUT (614# (#/5# (# I I I 1 li 1 
λε Εαν | 
siFzFOHRCECOZ2EQuUALZOZzTHENZxS3SEQGINS 
OUTPUT (519ፉ (#/ + (2 1 I 1 I I I 
SIF #5LV1 (/ህ/) #ኢ ሣህል, six THE 
0UTPUT (6l1»*(*/7**(* I I i I i m 
XLI #ፍ5ርህ1 (/ፌቱ/) ELUVALFCHATHENG 
UUTPUT (Ol pe (#z/ oe (# I I 1 I 1 L 
#10 ASEM] (/J/) #C III” 3x! ntis 
OUTPUT (61»*(*/s*(&* I I 1 1 ር ου 
#1 0 #ፍኡህ1 (C/U) FE Αι #ሣቻ ? |5ኩ|4# 

QUTPUT (ጊዩፅ#፣ (#ፍ/#ዖ#። (2 1 I I I L Ü 
SIF SSEW] (/.1/) FLUVUALASÉTHENX 

OUTPUT (612 (#/s% (# 1 I i I I OM 
#፲ ዮ#5ርህ1 (/ህ/ሥ) #ÉEAUALÉOÉTHENZ 

OUTPUT (C1:#(#/§#(# I I 1 I I 11 
Ἐξ Dfer 


*lr£j*NOTEUUAL*2iI*THEN*XGOTO*PLUS.» 
OUTPUT (Ol st (ፉ#”ፅፉ (AE) FF) κ} 559 
PTEE, 

PLUSi1ee ICI e eZ IC1i1* 1e» 

Kee Zif tle? 

AL. .2AL*13-AL*13apDIV*1609341293,, 
FURCE と 。。 ニ AL し こ A し し TV ょ CO6 ゃ 1。$ 

Εν Ξξ 99. Ἢ 

DANS? (JES) , #53ኩህ- (/K/) es 
Le.sSE* es 

DANS2(/E/) , BFURCE: en 
#IF#RITHC (/K/) と に は UAL そ は ま THEIN ま 
0UTPUT (° lose datts 

I 1 I ννγᾳ) ἘΚ) ξ) og 
sIF*FORCE2*CQUAL*1* THEN**BrEGIN* 
OUTPUT(oles(*/ 5#ሥ(# 

I I i #)##)#)09 
ZIFFSEUZ(/K/) #ዬህህልዚኒቓ1ጆ#ዎ፲ፐ!''ዷአሪ 
OUTPUT (ው19# (#/ οί 

I I 1 #)Zz#)%) <, 
#IF#Stuze (/ዚ/) ÉEGUALÉCÉTHENS 
OUTPUT(Ol ls #(F/ οκ 

I I 1 #)#Z)%) oy 
4IFeSEud (/K/)#btuuñLz23zT'ENz 
OUTPUT (O01 ο οκ 

I I 1 #)##)*) ο 
*$IF*SEu2 (/K/)#ktkuuaL FS FT HEN 
OUTPUT (619ዖ# (#/ 5# (+ 

፲ 1 4 #)%##)*f) oy 
£iFzSÉU. (/ከ/) ÉLUUALÉTÉATHENZ 
QUTPUT (Ol >z (#/ νά 

I I I #) FH) Fd e, 
*Ir*stu2 (/,%7 ) FEUUALÉDÉTHENF 
OUTPUT (C619#(#/ να 

I 1 #)Zz)Z) ay 
ま ヒ DU ま 。! | 
#+IFr4FURCER FEU ac z2zTrnENzzuc G Να 
OUTPUT(61*7 (ቾ/ ## ($ 

I I À 3) αχ} δ) ο 
#1 EASELS (SK) FL WUALSZASTVENS 
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#) ##X) #) 。* 


#)##)ጆ#],ቄ 


#)##)#),ፃፅ 
αλλα. 
#) XX) #) ot 
#)##)ዶ),ፄ 


#) ##)#)ა9 


Z)#%)#Z), + 


)2z)*9).9$* 


UU 


UM 


— 


- 33 መ 
VERSION 4.41 LEVEL 0004 XKALGUL 


OUTPUT (OLle#(#/ οί | | i A 
I I I #)##)ዎ)565 

#፲ዩዞ#ፍርህረ(/ዚ/)ጆ#ቓ፻ጀህህልዚቐረጆቕፐዘክዘፒከ። | 

OUTPUT (60159# (ቻ/ πα | l 
I i i £)*2)*)»5.) 

zIFe£SEQ2(/R/) £EuUALsJz THEN 

OUTPUT (619#(#/ s#(% | C យម 
I 1 I #)#%#)%)," 

#IFASEUC (/K/ ) FEQUALEFATHENG 

OUTPUT (O1, #(#/ ναί I Ü 
I I I Ἑ) Ἐπ} Κ ο 

*IF*SEu2 (7K7) FE QUALFESFTHENF 

OUTPUT(61l»*(*/ κ 1 Wi 
I I I #)##)%) e> 

ZIF#SEQS (/K/) FE WUAL ΟΤΙ Εν 


OUTPUT (Ol τί 5 と (そま 1 II 
I I I #)##)#ቹ#)*ፅ | | 

*END*,* 

*IF*FORCE2SEQUALX3£THENZ£BEGINs 

OUTPUT (61»*(*/ νε | | 1 I 


I I I κ) Ἐξ} Ὲ) οκ 

#IF#SEu2 (/K/)#EQUAL#1#THENZ 

0UTPUT (619# (ቐ/ εί ーー I I 
I I + *)»*)*) «+ | 

AIF #SEUC (/K/) Eg uA #።#ፐ ክጄ ክ# የድ P 

OUTPUT (Ol (σσ gie | | |» ^l I 
I i I #)#Z#)%) ο 

*IFÉSEu2 (/K/) FEQUAL# 3*# THEN* 

OUTPUT (Ol 5#ፉ (ቻ#/ ot (# | I I 

ህ 1 1 1 #)##)#*) ο 

#IFz#SEQzZ (/K/ ) EuUuALE** TOENS | | 

OUTPUT (91##(#/ ο: ι I 
I I I #)##)#) o> | 

#IFF SEU?) (/K/) FEQUALÉOÉTHENS 

OUTPUT (619# (#/ s#(# I I 

M I I i #) Επ) κ) ο} 

#IF#SEQ2 (/K/ )wWEWUALz#62THENz 


OUTPUT (618# (#/ τς | I I 
I I I 1 #)##)%)ი§ 

まそ END ょ 。$ 

ま 1F ま FORCE2 ょ EQUAL ま 4 ょ THEN そ まそ BEGIN ま 

OUTPUT (519# (#/ »*(* 1 1 


I I I #) ##)#)ი§ 

RIFÉSEUL (/R/) ÉEUUALÉ LÉTHENS 

OUTPUT(61»*(£/ s#(# I I 
À I i £)t2)9*)., 

#IF#SEQ2 (/K/) FEQUAL#C#THENSZ 

OUTPUT (612 (#/ 5# (# . 1 I 

I I Ἑ) Ἐκ} ο) 

#IFzSLu2 (/K/) &EUUALZJZTHEINS 

ዐህፐዞሀፐ (5›1## (#/ Kl 1 1 
OÙ 1 1 £)*2)*).» 

*lIrF*sEu2 (AK) FE QUAL ES*THENF 

QUTPUT(Ols#(#/ 5# (# | I I 
ዐ ፤ 4 #)##)#) o x 

#IF#SLtQ2 (/n/) FENUAL BOAT HENS 

QUTPUT(61»*(*/ 5ፃኞ (# 1 I 
OM i I #)##)ZF) ο 

#IFASEQC(/K/) FE QUAL 9 ES THE NS 
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ー "Ab -- 
VERSION 591 LEVEL 0004 ーー XXALGOL 
OUTPUT (6l»x(*/ ο 

Ir I 1 #Z)##)#) oy 
FEND#. $ 
zIFXZFORCE2ZEQUALv*G6zTHENZZBEOINZ 
OUTPUT (61»x(*/ 5 

I I I #)##)#) 5 9 
#IFASEUE (/K/) FÉEQUALÉLÉTHENS 
OUTPUT t6ls#I#/ sž(#ž 

I A I #) »»)*) e 
#IF#SEWC (/K/) FEQUALECETUENZ 
OUTPUT (もら 1]? と ( チ / »»(» 

I É I $)*£)9*)e595 
*lIFÉsEu2 (/K/)*EQUALT3* THEN 
OUTPUT (Olet#(#/ 9#(# 

I OU 4 #)##)#) ο 
FIF#SE Qe (/K/) FEWUAL eA TUENZ 
OUTPUT (Ol s#(#/ 5% (2 

I ს 1 #)%Z)%) es 
*IrFÉSEq2 (/K/ 7) FEQUALÉSÉTHENS 
OUTPUT (Olet(#/ »*(x 

I OM I #)#z)#) o> 
#IF#SEUL(/K/)FEUUALFOFTIIENE 
OUTPUT (919# (#/ νο 

| I 11 I Ἑ) ΚΕ} κ} ay 
*ENOD* , + | 
#IF#FORCE2z2EQUALzO2#THENZ#zZBEGINZ 
UUTPUT (61»* ($/ st (# 

I I I #)##)ም])5ቆ5 
FIFFSEU2(/K/)KEUUALFIFTHEN? 
OUTPUT (6139# (#/ #(# 

I I A #)#%#)#) oy 
だ 1F ま SEuMZ(/K/ ) EQUAL #C4ATUVENZ 
OUTPUT(Olssx(*/ κ 

I 1 Ë F)##)#)09 
RIFRSEGZ (/K/) FEQUALAIÉTHENS 
OUTPUT (61»s*(*/ οκ 

I 1 QU #ፉጾ)ፉ##)ዎሞዎ)ቆ5ፃ 
ま 1F ま SEM2 (/ኮ/) HEM AL ይፋቐ? HEN 
OUTPUT (61 9# (*/ 5* (# 

I I O #)##)#) os 
*IFsSEQ? (/K/) #ዬ ሠሀዶሂ #95#IIIნ M 
OUTPUT (*19# (#/ ES 

I OM ἘΚ) κ) e) 

* 1F*sEG2 სია EE auat សក់ 
OUTPUT (Ole#(#/ νε 

I I II #)##)#) ο 
#ኔ[ክ0#ቹ5ፃ 
#IF#K#NOTEQUAL#¿1Z#THENZ##GOTO#PLUS], + 
OUTPUT (O1 9 # (#9 e (##)#%)#) ον 
E ae ëneg | 
ჩLსს522291C1ი9-=1C11?1.39 
LeeB@Ltles 
AL. «5Αἱ 5134. «1 901ν 1099391093. 
FORCEZ 。。=A し =A し ょ けり TV ょ OOS ] 2, 
ErozEtles 
ሀዐልአ53(/5/)  eSSEq3(/L/) o9 
E. ,2E*1»» 

DANSI (/E/) 。。=FORCEZ 。 56 
#IF#RITH3(/L/)#ËQUAL#1z2THEN# 
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-- 34 — 
VERSION 451 LEVEL 0004 AKALGUL 
OUTPUT(6lsz(* /፥#(# 
| d I I I I 1 VVV#)##)#)09 
RAIFFFORCEZFEQUALÉ]ÉTNENFÉDEGINY 
OUTPUT(61»*(*/ eis 
| I I I I l 1 まま ) まま) 4) 09 
SIF SSEUS(/L/) &uuALS 1e THEN 
OUTPUT (619# (ቻ/ 5# (# 
A 1 I I I I£)9**)2).» 
*IFZ£SEQ3(/L/)*E9UALEez THEN» 
OUTPUT (618# (ቐ#/ 5#(# 
I : | Ë I I I I ៤*%)%*)#) ο} 
*IFzSEuJ(/L/) FE WUAL ESF THENE 
OUTPUT (91## (ቐ/ 5#ፆ (# | 
OU I 1 I I HUTT 
*IF*SEU3(7L7) FEULALFLFTHENF 
OUTPUT(61»*(*/ (4 
Q I 1 I I I#)##)z) ° 
#IF#SEQ3(0/L/)#EËEqUAL29#THENz | 
OUTPUT (ols#(#/ s#(% 
OM I I I I 1#)##)#)00 
ÉIFÉSEUS(/L/) FEUUALÉOÉTHENF 
OUTPUT (519# (ቾ/ 4 | 
II I I I I L#) κκ} £) 08 
xtN02.) | | | | f 
#IFz#FORCE22EQUALz2zTHENzZ#BEGINš 
 ዐህፐዞሀፐ(514#(#/ §#(# | | | | 
| I I រ |! 1 I$)**)9*).» 
ፍ1#5፣ህ5 (/L/ ) ま EMUAL そ 1 ま THEN テ | 
OUTPUT (blo#t#/ 5# (# ー | 
| I A I 1 I I#)##)z) o 
*Ir*sEQ3(/L/) FE QUAL #ZFETHEN* 
OUTPUT(61»*(*/ οί | 
| I E I I I ]Jz)9*4)2).95 
lF£SEM43(/L/) *EMUAL 3e THEN 
OUTPUT (61** (#/ e*(z 
u _ I 0២ 1 I I I*)*2*)3).)» 
ZIF#SEQS(/L/) £EQUALZ** THEN 
OUTPUT (614ዖ# (#/ »#(# 
I O I I I I$)**x)*).54» 
*IFÉSEQ3(/L/) *EQUAL*S T THEN? 
OUTPUT (934# (#/ ,»,*( 
f I OM I 1 I 1#)#Z)#) e? 
zIF2SEQ3(-(/L/)#EQUAL#O2#THENz 
OUTPUT (61 9# (#/ , (s 


I II I I I 1#)#%)#) 。 
ED テテ 。 9 ' 


#IF#FORCE22EQUALz3zTHENzz8EGINZ 
OUTPUT (612 (ጾ/ τς 
1 1 I ፲#)##ቹ)#)»6 
#IF#SEQS (/ር/ን FE ቁህልዚዎ ቢቻ THEN? 
OUTPUT (61## (ቐ/ 5#(ቹቾ 


| I I ለ I I Ita). 
#1፤#ፍ5595 (/L/) FEQUALEC#THENS 


OUTPUT(Š1, z (#/ να 

I I ន I I I*$)*)).» 
*IFZSEQ3(/L/) EJUALS3* THEN 
OUTPUT (615ፆ (#/ 5#(# 


I I UU I I 1#)##)%) ον 
*lFZSEQ3(/L/) FEUUALFFFTHENE 
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ALGOL-60 VERSION Gel LEVEL 0004 XXALGOL 
532 OUTPUT (61 5 まそ ( チ / κ 
533 I 1 U i I L#) #4) 4) 。$ 
534 *IF*SEu3(/L/) FERUALFDFATHENS 
535 OUTPUT(6l, e(*/ να 
536 I 1 ሀዘ I 1 ,»)»»)»)., 
537 #16 4#SEQ3 (/L/) HE QUAL #ZO#4 THEN? 
538 ህህፐዞህፐ (919# (#/ ,#(» 
539 I I II I 1 Iz)##)2).» 
2490 #C NO.» 
541 AIF SFORCE ፎዶዬዉህል፡#ሩ# ር ከቓጆ#ክዩ ሠ ING 
542 OUTPUT (615ጾ (#/ 5#(# 
543 I i I I I LE) ##)#) οκ 
544 ZIF+SEUIS(/L/)FEUVALZIFTMENg 
545 OUTPUT (61## (#/ yz (2 
546 I I I ñ I 11} 18} #4) 。? 
547 #IFASEUS(/L/) ま EUUAL ま を と ま THEN テ 
っ 48 OUTPUT (9) ,+»(#/ ##(# 
549 l I 1 E I 1 ま ) ま ま ) ま ) 。1 
559 *lF*sSEQ3(/L/) そ EMUAL ま うま THEN ェ > 
551 OUTPUT (6149# (#/ οκ 
552 I I I ህህ 1 1#)#Z)z) ον 


553 #IFÉASEUZ(/L/) *EQUAL*^* THEN? 
554 OUTPUT (Ol s#(#/ οκ 


555 ーー . I 1 I 0 1  Ix)##)#)., 
556 #IF4SEQ3 (/L/) AEQUALESETHENS : 


557 OUTPUT (9149# (ቾ/ νε 


558 I 1 I OM I 1*)**)3),; 
559 *IF*ZSLEQ3(/L/) ጾይይህህልዚጆክ።።#? ዘር ከአፉ 

560  ዐህፐዞዩህፐ (614#(ቐ/ να 

561 I 1 I II I I#)##)#). 6 
562 *ENDÉ,* | z | 

563 #IFZFORCELSFEWUUALLSLTMENZEBEGINE 

264 0ህፐዞህፐ (619# (#/ νε | | 

565 I I I I I I#)##)#) a 
566 *IF*SEQJ(/L/) FEQUALSIETHENE 

567 OUTPUT (91:0#(#/ εκ 

568 I I I I A 14) ¥#) #) ey 
569 £#I]F#SEuU3(/L/) FEQUALECETHENS 

570 OUTPUT (61 5 そま ( チ / 5ጾ# (። 

571 | I 1 I I 3 I#)##)#), ` 
572 #IFASE NZ (/L/) #ር “ሠል e3eTHENg 

573 OUTPUT (Ol 9#(#/ oF (#ፉ 

574 I I I I ου I#)##)#), 
575 HIF #SEUS(/L/) #C სტ. #*#ፐ ዘዩ ክ# 

576 OUTPUT (519# (#/ ,»(# 

577 | I I I : 0 1»)*#)#),, 
578 #IFÉASEQUS(/L/) ጾ#ዬ ህህልዚ #።>#ፐ ዘር ክፉ 

579 OUTPUT (*145# (#/ νι 

580 ፤ ፤ I I OM [Z#)##)#), 
581 #IF#SEQ3(/LC/)#EWMUALzOz#TIHE!Nz 

582 OUTPUT (61** (*/ ,(# 

583 I I I I II IZ#)##)#). e 
584 ま END ょ 。 5 | 

585 #IFz#FORCE2zEQUALzSzTHENzzBEGINzZ 

586 OUTPUT (Ol et(#/ o#(# | 

587 I I I I I I*$)*2)2).: 


588 *IFÉSEu3(/L/ ) FEQUALÉLÉTHENS 
589 OUTPUT (6ls#(#/ ox (# 
590 I I I I I Az)##)#), e 
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こる 7/ー 


VERSION იი) LEVEL 0004 Bere 


£ZIF£SEQ3(/L/) チ EMUAL ま と ま THEN ょ + 
ዐህፐዞህፐ (61#9# (#/ 6#(# m 
| I I I I I .#)##)2#) ο5 
#IFASEUS (/L/) FE WUAL4S#4THENZ 
OUTPUT (9149# (#/ ዩ#ፇ(# 
| ፲ 1 4 1 1 សប) ΣΣ ΣΡ 
ま IF テ SEQ3 (/ዚ/) &EaUALz* #ፐ ዘዬ NZ 
OUTPUT (もら 1 5 ま ( そ / εκ 
I I I I I U *)*vx$)2).,» 
sIF£SEQ3(/L/) &&aUAL zo2THENz 
OUTPUT (6 1 ? テ ( チ / »*(x 
I I I I I Ομ) #ቐ)ቹ#)ዓ ፃ 
#I1F#SEQ3(-/L/)#EQqUAL*YO#THENš | 
OUTPUT (Ol (^ νε 
I I I I I L1#)##)#) 。$ 
SEI DZ e 
IFÉL*NOTEQUAL*21*THENÉ*GOTOU*PLUS2*»* 
OUTPUT (6l, z(X*» E (EX) ΞΕ} κ) ον 
OUTPUT (Ol ot (e/o # (# SFIRCEF)I ER) EI ο 
OUTPUT (619#(#/ §# (#=0“=0-=0-=0=-0=-0=”=12)22)2) e 
OUTPUT (619# (ቐ/5# (#”0””0”” 0“ 0መ=0መመ0መ”2#)##)#)9ፃ 
OUTPUT (612 (#/## (ës Dee Des Dese 0መመ Dee 0መመኃ3#)#ም) κ) ο 
OUTPUT (619#(#//5ቐ (#=0መመ0”“”= Dam 0መመ00መመ0መመ4፣ሯ) FF) 4) $ 
OUTPUT (61 ? ま (チチ /6 そ (まこ 0 ここ 0 ここ 0= ご 0 ここ 0 ご こい ー こ ら ょ と) そそ ) テ ) ο» 
OUTPUT (619# (#/9# ($-0770770-70--0-7-07762z)z£)).» 
OUTPUT (61#9# (#ዎ/ ፃፍ (# FACE ልህ PUBLIC%)Z2)#) ον 
OUTPUT (61 ## (#//9# (#መ 1 ምመፎመመ 3መመዓዳመመጋቃኃመመፀህ መህ TES SONOREËESzZ)#z)#) e 
យយ. DE MANTRA ま を ) ま ま ) ま ) ον 
OUTPUT (61* * (FR FA ἐλ FRE). 
OUTPUT (61 p#(#/9#(#TABLEAU DANSIDU DANSEUR1 ASSOCIEE A VOIXI#)##)#10 0 
OUTPUT (ው19# (ቾ#/ዩ “። (881ሠሀ)#)#5ሠፆከአ511)65 
OUTPUT (6) ,#(##(#====წ IM DE DANS] 4) ##)#) ο 
OUTPUT (01 9# (*/s* (F#TABLEAU DANS2DU DANSEUR2 ASSOCIEE A VOIx2#)##)#) 。6 
OUTPUT (61 ¢#(#/94e (248910) κ) DANSE) 55 
OUTPUT (も 1 。 ま (まま (まっ ネー ニーF IN DE DANS2#) κκ) κ} os 
OUTPUT (6] ? ま ( ま /6 ま (そま TABLEAU DANS3DU DANSEUR3 ASSOCIEE ል VOIX3zZ)#2)#) o> 
OUTPUT (61 9# (#7942 (28910) #) #9DANS3) ον 
OUTPUT 618# εί” “ΕΙΝ DE DANS3#) ##) #) ss 
OUTPUT (61 9#(#%9# (CONFIGURATIONS DES DEPLACEMENTS SCENIQUE DANSEUR] tenet % % + 46 48 + 
#)##)ዎ)5ፃ 
z#FoRzËE, e es1z#STEP#2#UNTILz#%*cezD02 
xBEGIN£x 
Ge eBDANS](/E/) ο 
ር,59=ር+15695 
HeezDANSI(/E/0.9» 
ヒ 。。= ニ ヒデ! οφ 
ESPACE (/H6G/ ) ο 。 ミ の 。 9 
OUTPUT (61, (2/59(/,10, 20, 109 28,10, 2B» 1U。2B6? 10, 20, 1U) 8$) & ,ESPACE) oy 
QUTPUT(61s*(E* (ANCIENNES POSITIONS SUIVIT UE La NOUVELLE POSITION 
DANS L ESPACE SCENIQUE ま を) まま) #) 。 6 
OUTPUT (61? デ (まそ ( ま 2sSITUATION DE LA NOUVELLE POSITION#) ##)#),, 
OUTPUT (91 。 ま (まま (ませ UNITE SONOURE= #)2#)#)00 
OUTPUT (519# (Ds) $yH) e» 
OUTPUT (Ol et (## (Se *«FURCEZ z)22)2).» 
OUTPUT (61»* (#]ሀህ#) #5406)95 
ESPACE (/H*G/Z) 6 οΞὶ ο’ 
#ËENDZ ae 
#FORzG, 21#STEP#1#UNTILZ#62#002ZFOR#H, ez1#STEP#1#UNTIL#6#DO# 
ESPACE (/GeH/) ecE0es 
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-38- 
VERSION Gel | LEVEL 0004 ΧΧΑΙ ó OL 


OUTPUT (6195 #(#%9#% (#CONFIGURATIONS DES DEPLACEMENTS SCENIQUE DANSEUH2 tat d dd 
$)2*)*).49* 
#FORZE ee SLASTEPSCHUNTIL 4424002 

#KUEGINE 

Gee=DANS2(/C/) o? 

ΕΕ eth tiny 

HeesDANGZ (SES) ο 

C.ი=6.=)ა? 

ESPACE (/H。G/ ) 。。= ニ CZ。$ 
OUTPUT (610#1#/1617 Aa 25910) 28.19 468 810 26910626910) £) 24,ESPACE),, 
OUTPUT (61H #1## (ANCIENNES PUSITIONS SUIVIT DE La NOUVELLE POSITIUN 
DANS L ESPACE SCENIQUE#)#%#)%Z),,> 

OUTPUT (64#ቻዎ (#ቓ (#ፎኢ፲ ፐህልፐ ፤ህክ UE LA NOUVELLE ΡΟ5ΙΤΙΟΝ4) 88} 8) οκ 

OUTPUT (Ol st (##(#HH#UNITE SUNOREz z)zz)£).» 
OUTPUT (919% (#408) 9Η) oy 
OUTPUT(6]» (## (£*99FOHRCEZ £) 42) #4) οι 
OUTPUT (61 9# (#104) ένο)» 

ESPACE (/Hs G^) «5190 

SENDE,» 

SE OR ま ょ Go eo SLESTEPE] ZUNTILZOFLUFFFOREN. 49=1#5 ኩኑ ሦ#] #ህክፐ 11.#6#ሀህህ# 
ESPACE (/6ዩፃቨ/) 455355 
OUTPUT (e1** (ይቅ #ቻ (ቓርዐክዮ IGURATIONS DES DEPLACEMENTS SCENIQUE DANSE UR 3 5484445444. 
#)##)%#) ο 
#FORzEËE, oS LESTEPHSEUNTIL #4224002 

BEGIN 

G。。=DANS3 (/ ヒ /) os 

Ε 。。=E ィ 」。5 f 

HeeSDANS3(/E/) or 

ន. +=8។ : 。 

ESPACE (7H, G/ ) ο οΞῷ 
OUTPUT (61 9#(#/ 901/510 9259 1U92By 1U 925910928910 9265 1D) #) #9 ESPACE ) 。 » 
OUTPUT (615 ま (まま ( ま ANCIENNES POSITIONS SUIVIT DE La NOUVELLE POSITION 
DANS L ESPACE SCENIQUE4) ##)#),, 

OUTPUT (61? ま (まま (そま 2aSITUATION DE LA NOUVELLE POSITION#) ##)#) +, 

OUTPUT (615 そ (まそ (ませ 9UNITE SONOREs #) #4) #4), e 
OUTPUT (61»*(*10x)*,H),)» 
OUTPUT (61 ## (#%#(#%w#FORCEz 2)##)#)00 
OUTPUT (6194 (F1D#) Κο) ა! 

ESPACE (/riG/Z)»,. 71. 

SENDS, ῃ 
SE vis, 9 
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D AVERTISSEMENT 


Le présent bulletin répond à une 
visée teute didactique : livrer seus ferme 
accessible aux neuveaux venus dans les greupes 
de travail couraxts 

-ᾱθ l'infermatien technique et 
bibliegraphique en rapport avec leurs disciplines 


~des pregrammes commentós de teus 
niveaux permettant un accès relativement rapide à des techniques 
de pregrammatien appreprióes, ainsi qu'à une implémentatien aisée. 


On s'est effercé, dans la mesure du possible, de ne pas 
établir de clivage trop net entre les disciplines cencernées 
( musique, arts plastiques, peósie, architecture, logique, infor- 
matique ), mais tout au contraire de les, unifier, ne serait-ce 
que par des techniques de programmation communes. 


L'aspect pédagogique d'ARFINFY/MUSINFS reflète une pré- 
occupation censtante du groupe, à savoir ne pas se satisfaire en 
dernier ressort de méthedes de programmation trop élémentaires. 


ARTINFØ/MUSINFØ est imprimé au Département d'Infornatique 
de l'Université PARIS VIII ( Vincennes ). Gráces seient rendues aux 
soins diligents de Jacqueline BERTOUT, Renée STARY, Philippe PINON, 


Victor BORGES et à l'équipe des brocheurs/agrapheurs stakhanevistes 
(à vos souhaits ) de services (Ἢ m m 


. Peur tous renseignements et composition des livraisons à 
venir, s'adresser à Jacques ARVEILLER, Département d* Infermatique, 
Université PARIS VIII, Reute de la Tourelle, 75571 PARIS CEDEX 12. 
Pour tout envoi, នៈ adresser à Patrick GREUSSAY, même adresse. 


J| CONTROLE 


Si, malgré le son apporté à nos fabrications, 
vous avez une réclamation à formuler, nous 


| vous serions reconnaissant de l'accompagner 
de la présente Fiche de Contróle. 


ATM N° 641 79 | 
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